emp = [mom.emp_a0 mom.emp_a1 mom.emp_a2 mom.emp_a3 mom.emp_a4 mom.emp_a5]/mom.av_size_incumbent;
rev = [mom.rev_a0 mom.rev_a1 mom.rev_a2 mom.rev_a3 mom.rev_a4 mom.rev_a5]/mom.rev_av;
prod = exp([mom.prod_a0 mom.prod_a1 mom.prod_a2 mom.prod_a3 mom.prod_a4 mom.prod_a5])/exp(mom.prod_av);
mkp = log([mom.mkp_a0 mom.mkp_a1 mom.mkp_a2 mom.mkp_a3 mom.mkp_a4 mom.mkp_a5]);

subplot(2,2,1)
plot(0:5, emp,'LineWidth',4); xlabel('Age'); title('Employment'); xlim([1 5])
subplot(2,2,2)
plot(0:5, rev,'LineWidth',4); xlabel('Age'); title('Revenue');xlim([1 5])
subplot(2,2,3)
plot(0:5, prod,'LineWidth',4); xlabel('Age'); title('Productivity');xlim([1 5])
subplot(2,2,4)
plot(0:5, mkp,'LineWidth',4); xlabel('Age'); title('log Markup');xlim([1 5])

print('-dpng', 'figures/lifecycle.png')